home *** CD-ROM | disk | FTP | other *** search
/ C/C++ Users Group Library 1996 July / C-C++ Users Group Library July 1996.iso / vol_100 / 109_01 / lpr.c < prev    next >
Encoding:
C/C++ Source or Header  |  1985-03-09  |  2.1 KB  |  111 lines
  1. /*
  2.     Line printer formatter 
  3.  
  4.     Written by Leor Zolman
  5.            May 28, 1980
  6.  
  7.     First prints all files named on the command line, and then
  8.     asks for names of more files to print until a null line is typed.
  9.     Control-Q aborts current printing and goes to next file.
  10.  
  11.     Paper should be positioned ready to print on the first page; each
  12.     file is always printed in an even number of pages so that new files
  13.     always start on the same phase of fan-fold paper.
  14.  
  15.     Tabs are expanded into spaces.
  16. */
  17.  
  18. #define FF 0x00        /* formfeed character, or zero if not supported */
  19. #define PGLEN 66    /* lines per lineprinter page */
  20.  
  21. int colno, linesleft;
  22.  
  23. main(argc,argv)
  24. char **argv;
  25. {
  26.     int i;
  27.     int pgno, date[20], linebuf[135];
  28.     char fnbuf[30], *fname;
  29.     int fd, ibuf[134];
  30.     char *gets();
  31.     pgno = colno = 0;
  32.     linesleft = PGLEN; 
  33.     printf("What is today's date? ");
  34.     gets(date);
  35.     while (1)
  36.     {
  37.         if (argc-1)
  38.          {
  39.             fname = *++argv;
  40.             argc--;
  41.          }
  42.         else
  43.          {
  44.             printf("\nEnter file to print, or CR if done: ");
  45.             if (!*(fname = gets(fnbuf))) break;
  46.          }
  47.  
  48.         if ((fd = fopen(fname,ibuf)) == -1)
  49.          {
  50.             printf("Can't open %s\n",fname);
  51.             continue;
  52.          }
  53.         else printf("\nPrinting %-13s",fname);
  54.  
  55.         for (pgno = 1; ; pgno++)
  56.          {
  57.             putchar('*');
  58.             sprintf(linebuf,"\n%28s%-13s%5s%-3d%20s\n\n",
  59.                 "file: ",fname,"page ",pgno,date);
  60.             linepr(linebuf);
  61.         loop:    if (!fgets(linebuf,ibuf)) break;
  62.             if (kbhit() && getchar() == 0x11) break;
  63.             linepr(linebuf);
  64.             if (linesleft > 2) goto loop;
  65.             formfeed();
  66.          }
  67.         formfeed();
  68.         if (pgno % 2) formfeed();
  69.         fabort(fd);
  70.     }
  71. }
  72.  
  73. linepr(string)
  74. char *string;
  75. {
  76.     char c;
  77.     while (c = *string++)
  78.       switch (c) {
  79.         case '\n':    
  80.         putlpr('\r');
  81.         putlpr('\n');
  82.         colno = 0;
  83.         linesleft--;
  84.         break;
  85.  
  86.         case '\t':
  87.         do {
  88.           putlpr(' ');
  89.           colno++;
  90.         } while (colno % 8);
  91.         break;
  92.  
  93.         default:                    
  94.         putlpr(c);
  95.         colno++;
  96.     }
  97. }
  98.  
  99. putlpr(c)
  100. char c;
  101. {
  102.     bios(5,c);
  103. }
  104.  
  105. formfeed()
  106. {
  107.     if (FF) putlpr(FF);
  108.     else while (linesleft--) putlpr('\n');
  109.     linesleft = PGLEN;
  110. }
  111.